home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Dev / powerd / modules.lha / modules / lib / powerd.m < prev   
Encoding:
Text File  |  2000-03-10  |  4.4 KB  |  130 lines
  1. OPT    LINK='powerd.lib'
  2.  
  3. // String/EString functions ////////////
  4. RPROC DupEStr(a0:PTR TO CHAR)(PTR TO CHAR)
  5. RPROC DupEStrPooled(a0:PTR,a1:PTR TO CHAR)(PTR TO CHAR)
  6. RPROC DupStr(a0:PTR TO CHAR)(PTR TO CHAR)
  7. RPROC DupStrPooled(a0:PTR,a1:PTR TO CHAR)(PTR TO CHAR)
  8. RPROC EStrAdd(a0:PTR TO CHAR,a1:PTR TO CHAR,d0=-1)(PTR TO CHAR)
  9. LPROC EStrCopy(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(PTR TO CHAR)
  10. LPROC EStringF(dstr:PTR TO CHAR,fstr:PTR TO CHAR,list=NIL:LIST OF LONG)(PTR TO CHAR)
  11. RPROC EStrLen(a0:PTR TO CHAR)(LONG)
  12. RPROC EStrMax(a0:PTR TO CHAR)(LONG)
  13. RPROC InStr(a0:PTR TO CHAR,a1:PTR TO CHAR,d0=0:LONG)(LONG)
  14. RPROC MidEStr(a0:PTR TO CHAR,a1:PTR TO CHAR,d1,d0)(PTR TO CHAR)
  15. //LPROC MidStr(string:PTR TO CHAR,str:PTR TO CHAR,start,length)(PTR TO CHAR)
  16. RPROC IsAlpha(d0:LONG)(BOOL)
  17. RPROC IsBin(d0:LONG)(BOOL)
  18. RPROC IsHex(d0:LONG)(BOOL)
  19. RPROC IsNum(d0:LONG)(BOOL)
  20. RPROC LowerStr(a0:PTR TO CHAR)(PTR TO CHAR)
  21. RPROC NewEStr(d0:UWORD)(PTR TO CHAR)
  22. LPROC OStrCmp(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(LONG)
  23. LPROC ReadEStr(fh:BPTR,estr:PTR TO CHAR)(LONG)
  24. //LPROC ReadStr(fh:BPTR,str:PTR TO CHAR)(LONG)
  25. RPROC ReEStr(a0:PTR TO CHAR)
  26. RPROC RemEStr(a1:PTR TO CHAR)
  27. RPROC RemStr(a1:PTR TO CHAR)
  28. LPROC RightEStr(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length)(PTR TO CHAR)
  29. //LPROC RightStr(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length)(PTR TO CHAR)
  30. RPROC SetEStr(a0:PTR TO CHAR,d0:LONG)
  31. LPROC StrAdd(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(BOOL)
  32. LPROC StrCmp(dstr:PTR TO CHAR,sstr:PTR TO CHAR,length=-1)(BOOL)
  33. RPROC StrCopy(a0:PTR TO CHAR,a1:PTR TO CHAR,d0=-1)(BOOL)
  34. LPROC StringF(dstr:PTR TO CHAR,fstr:PTR TO CHAR,list=NIL:LIST OF LONG)(PTR TO CHAR)
  35. RPROC StrLen(a0:PTR TO CHAR)(LONG)
  36. RPROC TrimStr(a0:PTR TO CHAR)(PTR TO CHAR)
  37. RPROC UpperStr(a0:PTR TO CHAR)(PTR TO CHAR)
  38.  
  39. // List functions
  40.  
  41. // Math functions //////////////////////
  42. RPROC Abs(d0:LONG)(LONG)//='\ttst.l\td0\n\tbge.s\t.noneg\n\tneg.l\td0\n.noneg\n'
  43. RPROC And(d0:LONG,d1:LONG)(LONG)='\tand.l\td1,d0\n'
  44. RPROC BitCount(d0:LONG)(LONG)
  45. RPROC BitSize(d0:LONG)(LONG)
  46. RPROC EOr(d0:LONG,d1:LONG)(LONG)='\teor.l\td1,d0\n'
  47. RPROC HiBit(d0:LONG)(LONG)
  48. RPROC LoBit(d0:LONG)(LONG)
  49. RPROC Or(d0:LONG,d1:LONG)(LONG)='\tor.l\td1,d0\n'
  50. RPROC Neg(d0:LONG)(LONG)='\tneg.l\td0\n'
  51. RPROC Not(d0:LONG)(LONG)='\tnot.l\td0\n'
  52. RPROC Rol(d0:LONG,d1:LONG)(LONG)='\trol.l\td1,d0\n'
  53. RPROC Ror(d0:LONG,d1:LONG)(LONG)='\tror.l\td1,d0\n'
  54. RPROC Shl(d0:LONG,d1:LONG)(LONG)='\tasl.l\td1,d0\n'
  55. RPROC Shr(d0:LONG,d1:LONG)(LONG)='\tasr.l\td1,d0\n'
  56. RPROC Sign(d0:LONG)(LONG)
  57.  
  58. // FPU functions ///////////////////////
  59. RPROC Pow(fp0:DOUBLE,fp1:DOUBLE)(DOUBLE)
  60.  
  61. // Intuition support functions /////////
  62. RPROC Mouse()(LONG)
  63. RPROC MouseX(a0:PTR TO Window)(LONG)
  64. RPROC MouseXY(a0:PTR TO Window)(LONG,LONG)
  65. RPROC MouseY(a0:PTR TO Window)(LONG)
  66. RPROC WaitIMessage(a0:PTR TO Window)(LONG,LONG,LONG,LONG)
  67.  
  68. // Miscellaneous functions /////////////
  69. RPROC CtrlC()(BOOL)
  70. RPROC CtrlD()(BOOL)
  71. RPROC CtrlE()(BOOL)
  72. RPROC CtrlF()(BOOL)
  73.  
  74. RPROC Byte(a0:PTR TO BYTE)(LONG)
  75. RPROC Word(a0:PTR TO WORD)(LONG)
  76. RPROC Long(a0:PTR TO LONG)(LONG)
  77. RPROC UByte(a0:PTR TO BYTE)(LONG)
  78. RPROC UWord(a0:PTR TO WORD)(LONG)
  79. RPROC ULong(a0:PTR TO LONG)(LONG)
  80.  
  81. RPROC PutByte(a0:PTR TO BYTE,d0:LONG)(LONG)
  82. RPROC PutWord(a0:PTR TO WORD,d0:LONG)(LONG)
  83. RPROC PutLong(a0:PTR TO LONG,d0:LONG)(LONG)
  84.  
  85. RPROC Bounds(d0:LONG,d1:LONG,d2:LONG)(LONG)
  86. RPROC Even(d0:LONG)(BOOL)
  87. RPROC Odd(d0:LONG)(BOOL)
  88. RPROC Max(d0:LONG,d1:LONG)(LONG)
  89. RPROC Min(d0:LONG,d1:LONG)(LONG)
  90.  
  91. RPROC Rnd(d0:LONG)(LONG)
  92. RPROC RndQ(d0:LONG)(LONG)
  93.  
  94. EPROC FileLength(name:PTR TO CHAR)(LONG)
  95. RPROC KickVersion(d0:LONG)(BOOL)
  96.  
  97. LPROC Inp(fh:BPTR)(LONG)
  98. LPROC Out(fh:BPTR,ch:LONG)
  99.  
  100. EPROC RealStr(str:PTR TO UBYTE,f:DOUBLE,n=1)(PTR TO UBYTE)
  101. EPROC RealEStr(estr:PTR TO UBYTE,f:DOUBLE,n=1)(PTR TO UBYTE)
  102. EPROC RealVal(str:PTR TO UBYTE,pos=0)(DOUBLE)
  103. EPROC Val(s:PTR TO UBYTE,n=0)(LONG)
  104.  
  105. RPROC AllocVecPooled(a0:APTR,d0:LONG)(PTR)
  106. RPROC FreeVecPooled(a0:APTR,a1:PTR)
  107.  
  108. RPROC Raise(d0=NIL:LONG,d1=NIL:LONG)
  109. EDEF    exception,exceptioninfo
  110.  
  111. EPROC OpenW(l,t,w,h,i,f,n=NIL,s=NIL,st=1,g=NIL,tags=NIL:PTR TO TagItem)(PTR TO Window)
  112. EDEF    stdrast
  113. EPROC OpenS(w,h,d,t=0,n=NIL,tags=NIL:PTR TO TagItem)(PTR TO Screen)
  114. RPROC CloseW(a0:PTR TO Window)
  115. RPROC CloseS(a0:PTR TO Screen)
  116.  
  117. RPROC SetStdRast(d1:PTR TO RastPort)(PTR TO RastPort)
  118. RPROC Colour(d0,d1=0)
  119. RPROC Line(d0,d1,d2,d3,d4=-1)
  120. RPROC Plot(d0,d1,d2=-1)
  121. RPROC Box(d0,d1,d2,d3,d4=-1)
  122. RPROC Ellipse(d0,d1,d2,d3,d4=-1)
  123. RPROC Circle(d0,d1,d2,d3=-1)
  124. /*
  125. RPROC IBox(x,y,w,h,c=-1)
  126. RPROC TextF(x,y,fmt,args)
  127. */
  128.  
  129. //RPROC MapList(a2:PTR TO LONG,a1:PTR TO LONG,d0:LONG,a3:PTR TO LONG,a0:PTR TO LONG)
  130.